home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 27 / CU Amiga Magazine's Super CD-ROM 27 (1998)(EMAP Images)(GB)[!][issue 1998-10].iso / CUCD / Graphics / SViewNG / SuperViewLibrary / Install_SVLib < prev    next >
Encoding:
Text File  |  1998-08-09  |  24.3 KB  |  678 lines
  1. ; $VER: Install_SVLib V21.7 (1.8.98)
  2. ; © 1993-98 by Andreas R. Kleinert.
  3. ; This is the Installer Script for superview.library V21+
  4. ; Italian strings by Alessandro Basso <cralex@amiga.dei.unipd.it>
  5. ; Norwegian strings by Roger Hågensen <msi@sn.no>
  6. ; French strings by Julien Wilk <wilkj@esiee.fr>
  7. ; Spanish strings by Dámaso D. Estévez <amidde@arrakis.es>
  8.  
  9. (set @app-name "SuperView-Library")
  10. (welcome "SuperView-Library Installation")
  11.  
  12. (message (cat "If you are running MCP and don't disable the\n"
  13.               "following patches, you may encounter big problems:\n\n"
  14.               "- new tooltypes\n"
  15.               "- reqtols patch\n"
  16.               "- onereq\n"
  17.               "- library search\n"
  18.               "- SetRGB32\n"
  19.               "\nYou may wish to ask the authors of MCP to fix this\n"
  20.               "- if not already done. So, be warned !"))
  21.  
  22. (set #cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0)   (set #cpu     "68060")  )
  23. (set #ppc_cpu "none")       (if (> (exists ("sys:libs/ppc.library")) 0)     (set #ppc_cpu "PPC60x") )
  24.                             (if (> (exists ("sys:libs/PowerPC.library")) 0) (set #ppc_cpu "PPC60x") )
  25.  
  26. (if (= #ppc_cpu "PPC60x")
  27.  (
  28.   (message (cat "\nWhen using SuperView-Libraries' PPC-Modules, make\n"
  29.                 "sure, that you don't have powerpc.library V12+\n"
  30.                 "installed together with ppc.library V45+.\n\n"
  31.                 "Powerpc.library V7 should work, though.")
  32.   )
  33.  )
  34. )
  35.  
  36. ; *** english is default language
  37.  
  38.     (set #Msg_Yes "Yes")
  39.     (set #Msg_No  "No")
  40.     (set #Msg_BasicConfig "What's your basic configuration ?")
  41.     (set #Gfx0  "Not specified (do not change)")
  42.     (set #Gfx1  "Amiga OCS/ECS, no GfxCard")
  43.     (set #Gfx2  "Amiga AGA, no GfxCard")
  44.     (set #Gfx3  "CD-32 AGA, no GfxCard")
  45.     (set #Gfx4  "Card with CyberGraphX emulation")
  46.     (set #Gfx5  "Card with Picasso96 emulation")
  47.     (set #Gfx6  "Card with EGS emulation")
  48.     (set #Gfx7  "Picasso II(+)/IV")
  49.     (set #Gfx8  "Retina Z2/BLT Z3")
  50.     (set #Gfx9  "Merlin II")
  51.     (set #Gfx10 "OpalVision")
  52.     (set #Gfx11 "Amiga OCS/ECS/AGA, other GfxCard")
  53.     (set #Msg_CopyEnvConfig "Copying appropriate configuration to ENV:")
  54.     (set #Msg_LibPath "Library Path")
  55.     (set #Msg_InstallingLibs "Copying Libraries...")
  56.     (set #Msg_Ghostscript (cat "\nDo you already have Ghostscript installed ?\n\n"
  57.                                "(When answering with <Yes>, you have to supply\n"
  58.                                " the program's path and name here.)\n"
  59.                          )
  60.     )
  61.     (set #Msg_GSPath "Path and name of Ghostscript executable")
  62.     (set #Msg_MetaView    (cat "\nDo you already have MetaView installed ?\n\n"
  63.                                "(When answering with <Yes>, you have to supply\n"
  64.                                " the program's path and name here.)\n"
  65.                          )
  66.     )
  67.     (set #Msg_MVPath "Path and name of MetaView executable")
  68.     (set #Msg_CatPath "Catalog Path")
  69.     (set #Msg_InstallingCats "Copying catalog files...")
  70.     (set #Msg_VMEM "Now modifying your S:User-Startup for VMem-Support...")
  71.     (set #Msg_VMemPath "Virtual Memory Path")
  72.     (set #Msg_CopyPrefs "Copy SVPrefs to SYS:Prefs ?")
  73.     (set #Msg_PackerSupport "Install PackerSupport right now ?")
  74.     (set #Msg_SQOperators "Install SQ-Operators right now ?")
  75.     (set #Msg_Ready "SuperView-Library has been installed now.\nIf this was an Update, you should\nreboot your computer now.")
  76.  
  77.  
  78. (if (= @language "deutsch")
  79.   (
  80.     (set #Msg_Yes "Ja")
  81.     (set #Msg_No  "Nein")
  82.     (set #Msg_BasicConfig "Was ist Ihre Grundkonfiguration ?")
  83.     (set #Gfx0  "Keine Angabe (nichts ändern)")
  84.     (set #Gfx1  "Amiga OCS/ECS, keine Grafikkarte")
  85.     (set #Gfx2  "Amiga AGA, keine Grafikkarte")
  86.     (set #Gfx3  "CD-32 AGA, keine Grafikkarte")
  87.     (set #Gfx4  "Karte mit CyberGraphX-Emulation")
  88.     (set #Gfx5  "Karte mit Picasso96-Emulation")
  89.     (set #Gfx6  "Karte mit EGS-Emulation")
  90.     (set #Gfx7  "Picasso II(+)/IV")
  91.     (set #Gfx8  "Retina Z2/BLT Z3")
  92.     (set #Gfx9  "Merlin II")
  93.     (set #Gfx10 "OpalVision")
  94.     (set #Gfx11 "Amiga OCS/ECS/AGA, andere Grafikkarte")
  95.     (set #Msg_CopyEnvConfig "Kopiere notwendige Konfiguration nach ENV:")
  96.     (set #Msg_LibPath "Library-Pfad")
  97.     (set #Msg_InstallingLibs "Kopiere Libraries...")
  98.     (set #Msg_Ghostscript (cat "\nHaben Sie bereits Ghostscript installiert ?\n\n"
  99.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  100.                                " Programmpfad und -namen angeben.)\n"
  101.                          )
  102.     )
  103.     (set #Msg_GSPath "Pfad und Name des Ghostscript-Programmes")
  104.     (set #Msg_MetaView    (cat "\nHaben Sie bereits MetaView installiert ?\n\n"
  105.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  106.                                " Programmpfad und -namen angeben.)\n"
  107.                          )
  108.     )
  109.     (set #Msg_MVPath "Pfad und Name des MetaView-Programmes")
  110.     (set #Msg_CatPath "Katalogpfad")
  111.     (set #Msg_InstallingCats "Kopiere Katalogdateien...")
  112.     (set #Msg_VMEM "Ändere jetzt S:User-Startup für VMem-Unterstützung...")
  113.     (set #Msg_VMemPath "Pfad für virtuellen Speicher")
  114.     (set #Msg_CopyPrefs "SVPrefs nach SYS:Prefs kopieren ?")
  115.     (set #Msg_PackerSupport "Packer-Unterstützung jetzt gleich installieren ?")
  116.     (set #Msg_SQOperators "SQ-Operators jetzt gleich installieren ?")
  117.     (set #Msg_Ready "SuperView-Library wurde installiert.\nFalls dies ein Update war, sollten Sie ggf.\nIhren Rechner nun neu starten.")
  118.   )
  119. )
  120.  
  121. (if (= @language "italiano")
  122.   (
  123.     (set #Msg_Yes "Si")
  124.     (set #Msg_No  "No")
  125.     (set #Msg_BasicConfig "Qual è la tua configurazione base ?")
  126.     (set #Gfx0  "Non specificata (da non cambiare)")
  127.     (set #Gfx1  "Amiga OCS/ECS, senza SchedaGfx")
  128.     (set #Gfx2  "Amiga AGA, senza SchedaGfx")
  129.     (set #Gfx3  "CD-32 AGA, senza SchedaGfx")
  130.     (set #Gfx4  "Scheda con Emulazione-CyberGraphX")
  131.     (set #Gfx5  "Scheda con Emulazione-Picasso96")
  132.     (set #Gfx6  "Scheda con Emulazione-EGS")
  133.     (set #Gfx7  "Picasso II(+)/IV")
  134.     (set #Gfx8  "Retina Z2/BLT Z3")
  135.     (set #Gfx9  "Merlin II")
  136.     (set #Gfx10 "OpalVision")
  137.     (set #Gfx11 "Amiga OCS/ECS/AGA, altra SchedaGfx")
  138.     (set #Msg_CopyEnvConfig "Sto copiando configurazione appropriata in ENV:")
  139.     (set #Msg_LibPath "Percorso Libreria")
  140.     (set #Msg_InstallingLibs "Sto copiando Librerie...")
  141.     (set #Msg_Ghostscript (cat "\nHai già installato il Ghostscript ?\n\n"
  142.                                "(Se rispondi con <Si>, dovrai fornire\n"
  143.                                "nome e percorso del programma qui.)\n"
  144.                          )
  145.     )
  146.     (set #Msg_GSPath "Percorso e nome dell'eseguibile Ghostscript")
  147.     (set #Msg_MetaView    (cat "\nHai già installato il MetaView ?\n\n"
  148.                                "(Se rispondi con <Si>, dovrai fornire\n"
  149.                                "nome e percorso del programma qui.)\n"
  150.                          )
  151.     )
  152.     (set #Msg_MVPath "Percorso e nome dell'eseguibile MetaView")
  153.     (set #Msg_CatPath "Percorso Catalogo")
  154.     (set #Msg_InstallingCats "Sto copiando files del catalogo...")
  155.     (set #Msg_VMEM "Ora modifico la tua S:User-Startup per supporto-VMem...")
  156.     (set #Msg_VMemPath "Percorso Memoria Virtuale")
  157.     (set #Msg_CopyPrefs "Copio SVPrefs in SYS:Prefs ?")
  158.     (set #Msg_PackerSupport "Installo Supporto-Packer adesso ?")
  159.     (set #Msg_SQOperators "Installo Operatori-SQ adesso ?")
  160.     (set #Msg_Ready "Libreria-SuperView è stata ora installata.\nSe questo fosse un Aggiornamento, dovresti\neseguire un reboot del tuo computer ora.")
  161.   )
  162. )
  163.  
  164. (if (= @language "norsk")
  165.   (
  166.     (set #Msg_Yes "Ja")
  167.     (set #Msg_No  "Nei")
  168.     (set #Msg_BasicConfig "Hva er din standard konfigurasjon ?")
  169.     (set #Gfx0  "Ikke spesifisert (ikke forandre)")
  170.     (set #Gfx1  "Amiga OCS/ECS, ingen GfxKort")
  171.     (set #Gfx2  "Amiga AGA, ingen GfxKort")
  172.     (set #Gfx3  "CD-32 AGA, ingen GfxKort")
  173.     (set #Gfx4  "Kort med CyberGraphX emulasjon")
  174.     (set #Gfx5  "Kort med Picasso96 emulasjon")
  175.     (set #Gfx6  "Kort med EGS emulasjon")
  176.     (set #Gfx7  "Picasso II(+)/IV")
  177.     (set #Gfx8  "Retina Z2/BLT Z3")
  178.     (set #Gfx9  "Merlin II")
  179.     (set #Gfx10 "OpalVision")
  180.     (set #Gfx11 "Amiga OCS/ECS/AGA, annet GfxKort")
  181.     (set #Msg_CopyEnvConfig "Kopierer passende konfigurasjon til ENV:")
  182.     (set #Msg_LibPath "Bibliotek Sti (Library)")
  183.     (set #Msg_InstallingLibs "Kopierer Bibliotek...")
  184.     (set #Msg_Ghostscript (cat "\nHar du allerede Ghostscript installert ?\n\n"
  185.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  186.                                " programmet og programmets navn her.)\n"
  187.                          )
  188.     )
  189.     (set #Msg_GSPath "Sti og navn til Ghostscript program")
  190.     (set #Msg_MetaView    (cat "\nHar du allerede MetaView installert ?\n\n"
  191.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  192.                                " programmet og programmets navn her.)\n"
  193.                          )
  194.     )
  195.     (set #Msg_MVPath "Stio og nanv til MetaView program")
  196.     (set #Msg_CatPath "Katalog Sti")
  197.     (set #Msg_InstallingCats "Kopierer katalog filer...")
  198.     (set #Msg_VMEM "Modifiserer nå S:User-Startup for VMem-Støtte...")
  199.     (set #Msg_VMemPath "Virtuellt Minne Sti")
  200.     (set #Msg_CopyPrefs "Kopier SVPrefs til SYS:Prefs ?")
  201.     (set #Msg_PackerSupport "Installer PackerStøtte nå?")
  202.     (set #Msg_SQOperators "Installer SQ-Operatører (Operators) nå ?")
  203.     (set #Msg_Ready "SuperView-Library er nå installert.\nHvis dette var en Oppdatering, bør du\nstarte maskinen på nytt.")
  204.   )
  205. )
  206.  
  207. (if (= @language "français")
  208.   (
  209.     (set #Msg_Yes "Oui")
  210.     (set #Msg_No  "Non")
  211.     (set #Msg_BasicConfig "Quelle est votre configuration de base ?")
  212.     (set #Gfx0  "Non listée (ne rien changer)")
  213.     (set #Gfx1  "Amiga OCS/ECS, pas de carte graphique")
  214.     (set #Gfx2  "Amiga AGA, pas de carte graphique")
  215.     (set #Gfx3  "CD-32 AGA, pas de carte graphique")
  216.     (set #Gfx4  "Carte avec émulation CyberGraphX")
  217.     (set #Gfx5  "Carte avec émulation Picasso96")
  218.     (set #Gfx6  "Carte avec émulation EGS")
  219.     (set #Gfx7  "Picasso II(+)/IV")
  220.     (set #Gfx8  "Retina Z2/BLT Z3")
  221.     (set #Gfx9  "Merlin II")
  222.     (set #Gfx10 "OpalVision")
  223.     (set #Gfx11 "Amiga OCS/ECS/AGA, autre carte graphique")
  224.     (set #Msg_CopyEnvConfig "Copie de la configuration appropriée dans ENV:")
  225.     (set #Msg_LibPath "Chemin des librairies")
  226.     (set #Msg_InstallingLibs "Copie des librairies...")
  227.     (set #Msg_Ghostscript (cat "\nAvez-vous déjà installé Ghostscript ?\n\n"
  228.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  229.                                " le chemin du programme et son nom.)\n"
  230.                          )
  231.     )
  232.     (set #Msg_GSPath "Chemin et nom de l'exécutable Ghostscript")
  233.     (set #Msg_MetaView    (cat "\nAvez-vous déjà installé MetaView ?\n\n"
  234.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  235.                                " le chemin du programme et son nom.)\n"
  236.                          )
  237.     )
  238.     (set #Msg_MVPath "Chemin et nom de l'exécutable MetaView")
  239.     (set #Msg_CatPath "Chemin des catalogues")
  240.     (set #Msg_InstallingCats "Copie des fichiers catalogues...")
  241.     (set #Msg_VMEM "Modification de votre S:User-Startup au niveau de VMem-Support...")
  242.     (set #Msg_VMemPath "Chemin de la mémoire virtuelle")
  243.     (set #Msg_CopyPrefs "Copier SVPrefs dans SYS:Prefs ?")
  244.     (set #Msg_PackerSupport "Installer le PackerSupport maintenant ?")
  245.     (set #Msg_SQOperators "Installer les SQ-Operators maintenant ?")
  246.     (set #Msg_Ready "SuperView-Library a été installé avec succès.\nS'il s'agissait d'une mise à jour, vous devriez\nredémarrer votre ordinateur maintenant.")
  247.   )
  248. )
  249.  
  250. (if (= @language "español")
  251.   (
  252.     (set @app-name "Biblioteca SuperView")
  253.     (set #welc "Instalación de la biblioteca SuperView")
  254.  
  255.     (set #mcp (cat "Si está ejecutando la comodidad MCP y no desconecta\n"
  256.                    "los siguientes parches, podría encontrarse con\n"
  257.                    "graves problemas:\n\n"
  258.                    "- nuevos tipos de herramienta ('new tooltypes')\n"
  259.                    "- parche reqtols ('reqtools patch')\n"
  260.                    "- petición única ('onereq')\n"
  261.                    "- búsqueda de bibliotecas ('library search')\n"
  262.                    "- SetRGB32\n"
  263.                    "\nLe aconsejo que, si los autores de MCP no los han\n"
  264.                    "corregido aún, ¡tenga mucho cuidado! y les informe."))
  265.  
  266.      (set #ppc (cat "\nCuando utilice los módulos PPC para la biblioteca\n"
  267.                     "'superview.library', asegúrese de que no se encuentra\n"
  268.                     "instalada la biblioteca 'powerpc.library' versión 12+\n"
  269.                     "junto con la biblioteca 'ppc.library' versión 45+.\n\n"
  270.                     "Sin embargo, con la biblioteca 'powerpc.library'\n"
  271.                     "versión 7 no deberían surgir problemas.")
  272.                 )
  273.  
  274.     (set #Msg_Yes "Sí")
  275.     (set #Msg_No  "No")
  276.     (set #Msg_BasicConfig "¿Cual es su configuración básica?")
  277.     (set #Gfx0  "No especificada (no modificar)")
  278.     (set #Gfx1  "Amiga OCS/ECS, sin tarjeta gráfica")
  279.     (set #Gfx2  "Amiga AGA, sin tarjeta gráfica")
  280.     (set #Gfx3  "CD-32 AGA, sin tarjeta gráfica")
  281.     (set #Gfx4  "Tarjeta con emulación CyberGraphX")
  282.     (set #Gfx5  "Tarjeta con emulación Picasso96")
  283.     (set #Gfx6  "Tarjeta con emulación EGS")
  284.     (set #Gfx7  "Picasso II(+)/IV")
  285.     (set #Gfx8  "Retina Z2/BLT Z3")
  286.     (set #Gfx9  "Merlin II")
  287.     (set #Gfx10 "OpalVision")
  288.     (set #Gfx11 "Amiga OCS/ECS/AGA, con otra tarjeta gráfica")
  289.     (set #Msg_CopyEnvConfig "Copiando configuración apropiada en ENV:")
  290.     (set #Msg_LibPath "Elija el camino de acceso a las bibliotecas")
  291.     (set #Msg_InstallingLibs "Copiando bibliotecas...")
  292.     (set #Msg_Ghostscript (cat "\n¿Se encuentra instalado Ghostscript en su sistema?\n\n"
  293.                                "(si responde afirmativamente deberá suministrar\n"
  294.                                "el camino de acceso y nombre del ejecutable).\n"
  295.                          )
  296.     )
  297.     (set #Msg_GSPath "Camino de acceso y nombre del ejecutable Ghostscript")
  298.     (set #Msg_MetaView    (cat "\n¿Se encuentra instalado MetaView en su sistema?\n\n"
  299.                                "(si responde afirmativamente deberá suministrar\n"
  300.                                "el camino de acceso y nombre del ejecutable).\n"
  301.                          )
  302.     )
  303.     (set #Msg_MVPath "Camino de acceso y nombre del ejecutable MetaView")
  304.     (set #Msg_CatPath "Elija el lugar donde desea instalar los catálogos")
  305.     (set #Msg_InstallingCats "Copiando catálogos...")
  306.     (set #Msg_VMEM "Modificando su fichero S:User-Startup para el soporte de memoria virtual...")
  307.     (set #Msg_VMemPath "Camino de acceso a la memoria virtual")
  308.     (set #Msg_CopyPrefs "¿Desea copiar SVPrefs a SYS:Prefs ?")
  309.     (set #Msg_PackerSupport "¿Desea instalar ahora el módulo de empaquetado/compresión?")
  310.     (set #Msg_SQOperators "¿Desea instalar ahora los operadores SQ?")
  311.     (set #Msg_Ready "La biblioteca SuperView ha sido instalada.\nSi se trata de una actualización,\ndebería reiniciar su equipo inmediatamente.")
  312.   )
  313. )
  314.  
  315. ; **************************************************************************
  316. ; Create/Update basic configuration
  317.  
  318. (makedir "ENV:SuperView-Library")
  319. (makedir "ENVARC:SuperView-Library")
  320.  
  321. (set #selectsvdriver (askchoice
  322.                       (prompt #Msg_BasicConfig)
  323.                       (help @askchoice-help)
  324.                       (choices #Gfx0 #Gfx1 #Gfx2 #Gfx3 #Gfx4 #Gfx5 #Gfx6 #Gfx7 #Gfx8 #Gfx9 #Gfx10 #Gfx11)
  325.                       (default 1)
  326.                     )
  327. )
  328.  
  329. (if (= #selectsvdriver 1)  (set #env_source "docs/SampleConfigs/env_ECS")           )
  330. (if (= #selectsvdriver 2)  (set #env_source "docs/SampleConfigs/env_AGA")           )
  331. (if (= #selectsvdriver 3)  (set #env_source "docs/SampleConfigs/env_AGA_CD32")      )
  332. (if (= #selectsvdriver 4)  (set #env_source "docs/SampleConfigs/env_CyberGraphics") )
  333. (if (= #selectsvdriver 5)  (set #env_source "docs/SampleConfigs/env_Picasso96")     )
  334. (if (= #selectsvdriver 6)  (set #env_source "docs/SampleConfigs/env_EGS7")          )
  335. (if (= #selectsvdriver 7)  (set #env_source "docs/SampleConfigs/env_PicassoII")     )
  336. (if (= #selectsvdriver 8)  (set #env_source "docs/SampleConfigs/env_Retina")        )
  337. (if (= #selectsvdriver 9)  (set #env_source "docs/SampleConfigs/env_Merlin")        )
  338. (if (= #selectsvdriver 10) (set #env_source "docs/SampleConfigs/env_OpalVision")    )
  339. (if (= #selectsvdriver 11) (set #env_source "docs/SampleConfigs/env_GfxCards")      )
  340.  
  341. (if (> #selectsvdriver 0)
  342.   (
  343.     (copyfiles
  344.       (prompt #Msg_CopyEnvConfig)
  345.       (help @copyfiles-help)
  346.       (source #env_source)
  347.       (dest "ENV:")
  348.       (all)
  349.     )
  350.     (copyfiles
  351.       (prompt #Msg_CopyEnvConfig)
  352.       (help @copyfiles-help)
  353.       (source #env_source)
  354.       (dest "ENVARC:")
  355.       (all)
  356.     )
  357.   )
  358. )
  359.  
  360. (copyfiles
  361.   (prompt #Msg_CopyEnvConfig)
  362.   (help @copyfiles-help)
  363.   (source "env")
  364.   (dest "ENVARC:")
  365.   (all)
  366. )
  367.  
  368. ; **************************************************************************
  369. ; Install main libraries
  370.  
  371. (if (exists "ENVARC:SuperView-Library/SVLIB_WHERE") (set #svlibdir (getenv "SuperView-Library/SVLIB_WHERE"))
  372.  
  373.  (set #svlibdir "LIBS:")
  374. )
  375.  
  376. (if (= (exists (#svlibdir)) 0) (set #svlibdir "LIBS:") )
  377.  
  378. (set #svlibdir
  379.               (askdir
  380.                       (prompt #Msg_LibPath)
  381.                       (help @askdir-help)
  382.                       (newpath)
  383.                       (default #svlibdir)
  384.                )
  385. )
  386.  
  387. (delete "ENVARC:SuperView-Library/SVLIB_WHERE")
  388. (delete "ENV:SuperView-Library/SVLIB_WHERE")
  389. (textfile (dest "ENVARC:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  390. (textfile (dest "ENV:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  391.  
  392. (copylib
  393.   (prompt #Msg_InstallingLibs)
  394.   (help @copylib-help)
  395.   (source "libs/superview.library")
  396.   (dest #svlibdir)
  397. )
  398.  
  399. (set @default-dest #svlibdir)
  400.  
  401. (copylib
  402.   (prompt #Msg_InstallingLibs)
  403.   (help @copylib-help)
  404.   (source "libs/superviewsupport.library")
  405.   (dest #svlibdir)
  406. )
  407.  
  408. ; **************************************************************************
  409. ; Ask for Ghostscript
  410.  
  411. (set #gsquest (askchoice
  412.                 (prompt #Msg_Ghostscript)
  413.                 (help @askchoice-help)
  414.                 (choices #Msg_Yes #Msg_No)
  415.                 (default 1)
  416.               )
  417. )
  418.  
  419. (if (= #gsquest 0)
  420.   (
  421.     (set #gspath (askfile
  422.                   (prompt #Msg_GSPath)
  423.                   (help @askfile-help)
  424.                   (default "gs000")
  425.                 )
  426.     )
  427.     (set #gspathopt (cat "GS_PATH=" #gspath "\n"))
  428.     (textfile
  429.       (dest "ENV:SuperView-Library/Ghostscript.controlpad")
  430.       (append #gspathopt)
  431.     )
  432.     (copyfiles
  433.       (source "ENV:SuperView-Library/Ghostscript.controlpad")
  434.       (dest "ENVARC:SuperView-Library")
  435.     )
  436.   )
  437. )
  438.  
  439. ; **************************************************************************
  440. ; Ask for MetaView
  441.  
  442. (set #mvquest (askchoice
  443.                 (prompt #Msg_MetaView)
  444.                 (help @askchoice-help)
  445.                 (choices #Msg_Yes #Msg_No)
  446.                 (default 1)
  447.               )
  448. )
  449.  
  450. (if (= #mvquest 0)
  451.   (
  452.     (set #mvpath (askfile
  453.                   (prompt #Msg_MVPath)
  454.                   (help @askfile-help)
  455.                   (default "MetaView")
  456.                 )
  457.     )
  458.     (set #mvpathopt (cat "METAVIEW_PATH=" #mvpath "\n"))
  459.     (textfile
  460.       (dest "ENV:SuperView-Library/MetaView.controlpad")
  461.       (append #mvpathopt)
  462.     )
  463.     (copyfiles
  464.       (source "ENV:SuperView-Library/MetaView.controlpad")
  465.       (dest "ENVARC:SuperView-Library")
  466.     )
  467.   )
  468. )
  469.  
  470. ; **************************************************************************
  471. ; Install catalogs
  472.  
  473. (makedir "SYS:locale")
  474. (makedir "SYS:locale/catalogs")
  475.  
  476. (copyfiles
  477.   (prompt #Msg_InstallingCats)
  478.   (help @copyfiles-help)
  479.   (source "locale/catalogs")
  480.   (set #svcatdir
  481.               (askdir
  482.                      (prompt #Msg_CatPath)
  483.                      (help @askdir-help)
  484.                      (newpath)
  485.                      (default "SYS:locale/Catalogs")
  486.               )
  487.   )
  488.   (dest #svcatdir)
  489.   (all)
  490. )
  491.  
  492. ; **************************************************************************
  493. ; Install library modules
  494.  
  495. (set #svobjectdir   (tackon #svlibdir "svobjects"))
  496. (set #svdriverdir   (tackon #svlibdir "svdrivers"))
  497. (set #svoperatordir (tackon #svlibdir "svoperators"))
  498. (set #svstoredir    (tackon #svlibdir "svstorage"))
  499.  
  500. (makedir #svobjectdir)
  501. (makedir #svdriverdir)
  502. (makedir #svoperatordir)
  503. (makedir #svstoredir)
  504.  
  505. (copyfiles
  506.   (prompt #Msg_InstallingLibs)
  507.   (help @copyfiles-help)
  508.   (source "libs/svobjects")
  509.   (dest (tackon #svlibdir "svobjects"))
  510.   (pattern "#?")
  511.   (confirm)
  512.   (files)
  513. )
  514.  
  515. (if (exists(tackon #svobjectdir "SVO.svobject"))
  516.  (rename (tackon #svobjectdir "SVO.svobject") (tackon #svstoredir "SVO.svobject") (safe))
  517. )
  518.  
  519. (if (exists(tackon #svobjectdir "CyberDataType.svobject"))
  520.  (rename (tackon #svobjectdir "CyberDataType.svobject") (tackon #svstoredir "CyberDataType.svobject") (safe))
  521. )
  522.  
  523. (copyfiles
  524.   (prompt #Msg_InstallingLibs)
  525.   (help @copyfiles-help)
  526.   (source "libs/svdrivers")
  527.   (dest (tackon #svlibdir "svdrivers"))
  528.   (pattern "#?")
  529.   (confirm)
  530.   (files)
  531. )
  532.  
  533. (if (NOT (= #selectsvdriver 5))
  534.  (rename (tackon #svdriverdir "Picasso96.svdriver") (tackon #svstoredir "Picasso96.svdriver") (safe))
  535. )
  536.  
  537. (if (NOT (= #selectsvdriver 6))
  538.  (rename (tackon #svdriverdir "EGS7.svdriver") (tackon #svstoredir "EGS7.svdriver") (safe))
  539. )
  540.  
  541. (if (NOT (= #selectsvdriver 7))
  542.  (rename (tackon #svdriverdir "PicassoII.svdriver") (tackon #svstoredir "PicassoII.svdriver") (safe))
  543. )
  544.  
  545. (if (NOT (= #selectsvdriver 8))
  546.  (rename (tackon #svdriverdir "Retina.svdriver") (tackon #svstoredir "Retina.svdriver") (safe))
  547. )
  548.  
  549. (if (NOT (= #selectsvdriver 9))
  550.  (rename (tackon #svdriverdir "MERLIN.svdriver") (tackon #svstoredir "MERLIN.svdriver") (safe))
  551. )
  552.  
  553. (if (NOT (= #selectsvdriver 10))
  554.  (rename (tackon #svdriverdir "OPAL.svdriver") (tackon #svstoredir "OPAL.svdriver") (safe))
  555. )
  556.  
  557. (copyfiles
  558.   (prompt #Msg_InstallingLibs)
  559.   (help @copyfiles-help)
  560.   (source "libs/svoperators")
  561.   (dest (tackon #svlibdir "svoperators"))
  562.   (pattern "#?")
  563.   (confirm)
  564.   (files)
  565. )
  566.  
  567. (if (>= #cpu 68020)
  568.   (
  569.     (copyfiles
  570.       (prompt #Msg_InstallingLibs)
  571.       (help @copyfiles-help)
  572.       (source "libs/68030")
  573.       (dest #svlibdir)
  574.       (confirm)
  575.       (all)
  576.     )
  577.   )
  578. )
  579.  
  580. ; **************************************************************************
  581. ; Modify User-Startup
  582.  
  583. (if (exists "ENVARC:SuperView-Library/SVMEM_WHERE") (set #vmemdir (getenv "SuperView-Library/SVMEM_WHERE"))
  584.  
  585.  (set #vmemdir "T:")
  586. )
  587.  
  588. (if (= (exists (#vmemdir)) 0) (set #vmemdir "T:") )
  589.  
  590. (set #vmemdir
  591.               (askdir
  592.                 (prompt #Msg_VMemPath)
  593.                 (help @askdir-help)
  594.                 (newpath)
  595.                 (default #vmemdir)
  596.               )
  597. )
  598.  
  599. (delete "ENVARC:SuperView-Library/SVMEM_WHERE")
  600. (delete "ENV:SuperView-Library/SVMEM_WHERE")
  601. (textfile (dest "ENVARC:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  602. (textfile (dest "ENV:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  603.  
  604. (startup "SuperView-Library"
  605.   (prompt #Msg_VMEM)
  606.   (help @startup-help)
  607.   (command "Assign VMEM: "#vmemdir"\nSVPrefs >NIL: <NIL: INIT\n")
  608. )
  609.  
  610. ; **************************************************************************
  611. ; Install SVPrefs
  612.  
  613. (copyfiles
  614.   (prompt #Msg_CopyPrefs)
  615.   (help @copyfiles-help)
  616.   (source "Prefs")
  617.   (dest "SYS:Prefs")
  618.   (all)
  619.   (confirm)
  620. )
  621.  
  622. ; **************************************************************************
  623. ; Ask for Packersupport
  624.  
  625. (if (exists "PackerSupport")
  626.   (
  627.     (set #ask_ps (askbool (prompt #Msg_PackerSupport) (help @askbool-help) ) )
  628.  
  629.     (if (= #ask_ps TRUE)
  630.       (
  631.         (copyfiles
  632.           (prompt #Msg_InstallingLibs)
  633.           (help @copyfiles-help)
  634.           (source "PackerSupport/libs/svobjects")
  635.           (dest (tackon #svlibdir "svobjects"))
  636.           (pattern "#?")
  637.           (files)
  638.         )
  639.       )
  640.     )
  641.   )
  642. )
  643.  
  644. ; **************************************************************************
  645. ; Ask for SQOperators
  646.  
  647. (if (exists "SQ-Operators")
  648.   (
  649.     (set #ask_sq (askbool (prompt #Msg_SQOperators) (help @askbool-help) ) )
  650.  
  651.     (if (= #ask_sq TRUE)
  652.       (
  653.         (copyfiles
  654.           (prompt #Msg_CopyEnvConfig)
  655.           (help @copyfiles-help)
  656.           (source "SQ-Operators/envarc")
  657.           (dest "ENVARC:")
  658.           (all)
  659.         )
  660.         (copyfiles
  661.           (prompt #Msg_InstallingLibs)
  662.           (help @copyfiles-help)
  663.           (source "SQ-Operators/libs/svoperators")
  664.           (dest (tackon #svlibdir "svoperators"))
  665.           (pattern "#?")
  666.           (confirm)
  667.           (files)
  668.         )
  669.       )
  670.     )
  671.   )
  672. )
  673.  
  674. ; **************************************************************************
  675. ; EOF ;-)
  676.  
  677. (exit #Msg_Ready)
  678.